home *** CD-ROM | disk | FTP | other *** search
/ Nebula 2 / Nebula Two.iso / WebObjects / WebObjectsDoc_HTML / Reuse / ReusableComponentsEx / ComponentDescription.wo / ComponentDescription.wos < prev    next >
Encoding:
Text File  |  1996-02-28  |  1.3 KB  |  67 lines
  1. ///////////////////////////
  2. //  ComponentDescription
  3. //  by Charles Lloyd
  4. ///////////////////////////
  5.  
  6. ////////////////////////
  7. //  Required
  8. ////////////////////////
  9. id componentName;
  10.  
  11. ////////////////////////
  12. //  Internal State
  13. ////////////////////////
  14. id descriptionString;
  15. id descriptionString;
  16.  
  17. id parameterCount;
  18. id parameterIndex;
  19. id parameterDescriptionArray;
  20.  
  21.  
  22. - awake
  23. {
  24.     componentName = nil;
  25. }
  26.  
  27. - _initDescriptionArrays
  28. {
  29.     id aDescriptionTable = [WOApp descriptionsForComponentNamed:componentName];
  30.     descriptionString = [aDescriptionTable objectForKey:@"description"];
  31.     parameterDescriptionArray = [aDescriptionTable objectForKey:@"parameters"];
  32. }
  33.  
  34. - setComponentName:aComponentName
  35. {
  36.     if (!componentName) {
  37.     componentName = aComponentName;
  38.     [self _initDescriptionArrays];
  39.     parameterCount = [parameterDescriptionArray count] / 2;
  40.     }
  41. }
  42.  
  43. - parameterName
  44. {
  45.     id anActualIndex = parameterIndex * 2;
  46.     id aString = [parameterDescriptionArray objectAtIndex:anActualIndex];
  47.     return aString;
  48. }
  49.  
  50. - parameterDescription
  51. {
  52.     id anActualIndex = (parameterIndex * 2) + 1;
  53.     id aString = [parameterDescriptionArray objectAtIndex:anActualIndex];
  54.     return aString;
  55. }
  56.  
  57. - setParameterName:aString
  58. {
  59.     return nil;
  60. }
  61.  
  62. - setParameterDescription:aString
  63. {
  64.     return nil;
  65. }
  66.  
  67.